9 REM"[204]
10 [151]808,225:[151]768,226:[151]769,252
98 [151]768,226:[151]769,252
100 [151] 53280,0:[151] 53281,0
105 CL$[178][199](147):W$[178][199](0):Q[178]144
110 [134] DA(32),V1(Q),V2(Q),FI$(Q),TR(Q),SE(Q),VF$(Q),VT(Q),VS(Q),D1(Q),D2(Q)
115 [129] I[178]1 [164] 32:[135] DA(I):[130]
120 [153] CL$"TIDE-VIRUS-CLEANER V2. CODE BY TOMZ/TIDE":[153]:[153]
125 [153]"         1.WAIT SCAN FOR VIRUS.":[153]
130 [153]"         2.WAIT LIST INFECTED PROGRAMS.":[153]
135 [153]"         3.WAIT CLEAN DISK.":[153]
140 [153]"         4.WAIT QUIT PROGRAM.":[153]:[153]
141 [153]"F E E L...........THE...........OPENTCLR I DSYS E"
144 [151]198,0:[146]198,1
145 [161] A$:[139] A$[178]" " [137] 145
150 [153] A$:[145] [197](A$) [137] 160,310,330,360
155 [137] 145
160 [141] 390:[139] F [167] [153] A2$:[141] 375:[137] 120
165 [159] 1,8,15,"I":[159] 2,8,2,"#":[153]:[153]"SCANNING FOR VIRUS...FIRST PASS"
170 TR[178]18:SE[178]1:FZ[178]0
175 [152]1,"U1 2 0 18";SE:SX[178]SE
180 [161]#2,A$,B$
185 TR[178][198](A$[170]W$):SE[178][198](B$[170]W$)
190 [129] BP[178]2 [164] 226 [169] 32
195 [152]1,"B-P 2";BP
200 [161]#2,A$:[139] ([198](A$[170]W$)[175]15)[179][177]2 [167] [130] BP:[137] 225
205 FZ[178]FZ[170]1:[161]#2,A$,B$:TR(FZ)[178][198](A$[170]W$):SE(FZ)[178][198](B$[170]W$)
210 FI$(FZ)[178]" ":D1(FZ)[178]SX:D2(FZ)[178]BP[170]1
215 [129] I[178]1 [164] 16:[161]#2,A$:FI$(FZ)[178]FI$(FZ)[170]A$:[130]
220 [153]".";:[130]
225 [139] TR[179][177]0 [137] 175
230 [153]:[139] FZ[178]0 [167] [153]"INFECTED BLOKS IN PRG ON DISK.":[137] 285
235 [153]:[153]"SCANNING FILES(EACH'.'IS A FILE)"
240 VZ[178]0:Z[178]0
245 Z[178]Z[170]1
250 [152]1,"U1 2 0";TR(Z);SE(Z)
255 [161]#2,A$,B$:FT[178][198](A$[170]W$):FS[178][198](B$[170]W$):[161]#2,A$,A$
260 [129] I[178]1 [164] 32:[161]#2,A$:A[178][198](A$[170]W$)
265 [139] A[178]DA(I) [167] [130] I:[137] 290
270 I[178]32:[130] I
275 [153]".";:[139] Z[179][177]FZ [137] 245
280 [139] VZ[178]0 [167] [153]:[153]:[153]"NO VIRUS DETECTED IN DIRECTORY"
285 [160] 2:[160] 1:[141] 375:[137] 120
290 [153]"VIRUS CLEAN"FI$(Z)"!"
295 VZ[178]VZ[170]1:VF$(VZ)[178]FI$(Z):VT(VZ)[178]TR(Z):VS(VZ)[178]SE(Z)
300 V1(VZ)[178]D1(Z):V2(ZV)[178]D2(Z)
305 [137] 275
310 [153]CL$:[139] VZ[178]0 [167] [153]"NO VIRUS DETECTED ON DISK":[141]375:[137]120
315 [153]"PROGRAM CLEANED:":[153]
320 [129] I[178]1 [164] VZ:[153] VF$(I):[130]
325 [141] 375:[137] 120
330 [141] 390:[139] F [167] [153] A2$:[141] 375:[137] 120
335 [153] CL$"0";:[159] 1,8,0,"$":[151]781,1:[158] 6478:[161] A$,A$,A$,A$
340 [129] I[178]1 [164] 7:[161] A$,B$,C$,D$:[153] A$B$C$D$;:[130]:[153]:[161] A$,A$,A$,B$
345 [139] ST [167] [158] 65484:[137] 355
350 [153] [198](A$[170]W$)[170]256[172][198](B$[170]W$);:[137]340
355 [160] 1:[141] 375:[137] 120
360 [159] 1,8,15,"I0":[160] 1:[158] 64738
365 [131] 031,008,194,007,158,194,040,052,051,041,170,194,040,052,052,041
370 [131] 172,050,053,054,170,052,056,058,086,073,082,085,083,000,000,000
375 [153]:[153]:[153]"PRESS RETURN.":[151] 1 98,0
380 [161] A$:[139] A$[179][177][199](13)[137] 380
385 [142]
390 F[178]1:[159] 1,8,15,"I":[132]1,A1$,A2$,A3$,A4$:[160]1:[139] A1$[178]"00" [167] F[178]0
395 [142]